home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 4 / Apprentice-Release4.iso / Demos / AppMaker 2.0b3 / Demo AppMaker 1.5 / Demo AppMaker™ / Demo AppMaker™.rsrc / TmpP_1009_Picture < prev    next >
Encoding:
Text File  |  1992-04-08  |  436 b   |  28 lines
  1. %case update%
  2.     DrawPictureID (%pictID%, GetWRect (%itemname%));
  3. %case itemNr%
  4.     %DefineItem%
  5. %case dialog field%
  6.     %if enabled%
  7.         %fieldname%:%        %Handle;
  8.         %haveField%
  9.     %end if%
  10. %case init field%
  11.     %if enabled%
  12.         %fieldname% := nil;
  13.     %end if%
  14. %case auxiliary%
  15.     %if enabled%
  16.         {----------}
  17.         Procedure Do%itemname%;
  18.         Begin
  19.         End; {Do%itemname%}
  20.         
  21.     %end if%
  22. %case hit%
  23.     %if enabled%
  24.         %Itemname%: begin
  25.                 Do%Itemname%;
  26.             end;
  27.     %end if%
  28.